library(mldr)
highlycoupled <- genbase[.SCUMBLE > 0.05] # Select instances with highly imbalanced coupled labels
summary(highlycoupled) # Compare the selected instances
summary(genbase) # with the traits of the original MLDRun the code above in your browser using DataLab